1 clear ;.WEIRD! - BY TIM HAYS
10 @(1)=97;@(2)=87;@(3)=73;@(4)=69;@(5)=82;@(6)=68;@(7)=33
20 input "LETTER SIZE?"L;clear ;BC=0;FC=134;&(10)=140;CY=-30;for A=1to 7;TV=@(A);next A
30 &(16)=100;&(21)=79;&(22)=255
40 NT=0;for X=-80to 160div L-80;for Y=-33to -27
50 if PX(X,Y)box (X+81)mul L-79,(Y+30)mul L,L,L,1
60 D=rnd (3)+16;&(D)=rnd (150)+10
70 next Y;next X
80 box -59,-30,42,9,2;&(10)=174;&(22)=0;&(21)=0
:return ;run 
